#pragma once

#include <iostream>
#include <unistd.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <sys/wait.h>
#include <cstring>
#include <pthread.h>
#include <functional>
#include "Log.hpp"
#include "InetAddr.hpp"

using namespace log_ns;

const static int gport = 8888;
const static int gsock = -1;
const static int gblcklog = 8;

using command_service_t = std::function<void(int sockfd, InetAddr addr)>;

enum
{
    SOCKET_ERROR = 1,
    BIND_ERROR,
    LISTEN_ERR
};

class TcpServer
{
public:
    TcpServer(uint16_t port = gport)
        : _port(port), _listensockfd(gsock)
    {}
    void InitServer()
    {
        // 1.创建socket
        _listensockfd = ::socket(AF_INET, SOCK_STREAM, 0);
        if(_listensockfd < 0)
        {
            LOG(FATAL, "socket create error\n");
            exit(SOCKET_ERROR);
            
        }
        LOG(INFO, "socket create success, sockfd: %d\n", _listensockfd);

        struct sockaddr_in local;
        memset(&local, 0, sizeof(local));

        local.sin_port = htons(_port);
        local.sin_family = AF_INET;
        local.sin_addr.s_addr = INADDR_ANY;
        
        // 2.bind socket 和 addr
        if(::bind(_listensockfd, (struct sockaddr*)&local, sizeof(local)) < 0)
        {
            LOG(FATAL, "bind error\n");
            exit(BIND_ERROR);
        }

        LOG(INFO, "bind success\n");

        // 3. tcp 是面向连接的，tcp需要未来不断地能够做到获取连接
        if(::listen(_listensockfd, gblcklog) < 0)
        {
            LOG(FATAL, "listen error\n");
            exit(LISTEN_ERR);
        }
        LOG(INFO, "listen success\n");
    }


    // 保证静态的Execute方法能够调用类内的成员方法
    // 保证新线程能看到sockfd
    class ThreadData
    {
    public:
        int _sockfd;
        TcpServer* _self;
        InetAddr _addr;

        ThreadData(int sockfd, TcpServer* self, const InetAddr& addr) 
            : _sockfd(sockfd), _self(self), _addr(addr)
        {}
    };

    void Loop()
    {
        _isrunning = true;
        while(_isrunning)
        {
            struct sockaddr_in client;
            socklen_t len = sizeof(client);
            // 4. 获取新连接
            int sockfd = ::accept(_listensockfd, (struct sockaddr*)&client, &len);

            if(sockfd < 0)
            {
                LOG(WARNING, "accept error\n");
                continue;
            }
            InetAddr addr(client);
            LOG(INFO, "get a new link, client info : %s\n", addr.AddrStr());


            // 多线程版
            pthread_t tid;
            ThreadData* td = new ThreadData(sockfd, this, addr);

            pthread_create(&tid, nullptr, Execute, td); // 新线程进行分离

        }
        _isrunning = false;
    }

    static void* Execute(void* args)
    {
        ThreadData* td = static_cast<ThreadData*>(args);
        td->_self->_service(td->_sockfd, td->_addr);

        ::close(td->_sockfd);
        delete td;
        
        return nullptr;
    }

    void Service(int sockfd, InetAddr addr)
    {
        while(true)
        {
            char inbuffer[1024];
            LOG(INFO, "client: %s, message: %s\n", addr.AddrStr().c_str(), inbuffer);
            ssize_t n = ::read(sockfd, inbuffer, sizeof(inbuffer) - 1);
            if(n > 0)
            {
                inbuffer[n] = 0;
                std::string echo_string = "[server echo] #";

                echo_string += inbuffer;
                write(sockfd, echo_string.c_str(), echo_string.size());
            }
            else if(n == 0)
            {
                // 客户端退出
                LOG(INFO, "client %s quit\n", addr.AddrStr().c_str());
                break;
            }
            else
            {
                // 读出错
                LOG(ERROR, "read error : %s\n", addr.AddrStr().c_str());
                break;
            }
        }
        ::close(sockfd);
    }
    ~TcpServer()
    {}
private:
    uint16_t _port;
    int _listensockfd;
    bool _isrunning;
    command_service_t _service;
};
